home *** CD-ROM | disk | FTP | other *** search
/ Play Windows 1995 October / CD [playwin].bin / mac / demo / 00100.ls < prev    next >
Encoding:
Text File  |  1995-08-11  |  264 b   |  14 lines
  1. on mouseUp
  2.   puppetSprite(12, 1)
  3.   set the castNum of sprite 12 to 85
  4.   updateStage()
  5.   sound playFile 1, "click"
  6.   repeat while soundBusy(1)
  7.     nothing()
  8.   end repeat
  9.   set the castNum of sprite 12 to 79
  10.   updateStage()
  11.   puppetSprite(12, 0)
  12.   go("hsunder")
  13. end
  14.